home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Demos / AppMaker™ 1.5 DEMO / Demo AppMaker™ / Demo AppMaker™.rsrc / TmpP_901_Enable? < prev    next >
Encoding:
Text File  |  1992-04-08  |  386 b   |  22 lines
  1. %case window field%
  2.     %if disabled%
  3.         %enabledname%:%        %Boolean;
  4.     %endif%
  5. %case create%
  6.     %if disabled%
  7.         EnableControl (%HandleName%, false);
  8.     %endif%
  9. %case dialog field%
  10.     %if disabled%
  11.         %enabledname%:%        %Boolean;
  12.         %haveField%
  13.     %endif%
  14. %case init field%
  15.     %if disabled%
  16.         %enabledname% := false;
  17.     %endif%
  18. %case enable%
  19.     %if disabled%
  20.         EnableDItem (%itemname%, %enabledname%);
  21.     %endif%
  22.